<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="UTF-8">
<title>sampleFile - OpenGrok cross reference for /sampleFile</title></head><body>
<script type="text/javascript">/* <![CDATA[ */
function get_sym_list(){return [["Function","xf",[["WRONG-FUNCTION-2",72],["WRONG-FUNCTION-3",73],["test-mapcar-and-reduce",75],["test-mapcar-basics",15],["test-mapcar-multiple-lists",25],["test-reduce-basics",51],["test-reduce-right-to-left",59],["test-reduce-with-initial-value",66],["test-transpose-using-mapcar",33]]]];} /* ]]> */</script><a class="l" name="1" href="#1">1</a><span class="c">;;   Copyright 2013 Google Inc.</span>
<a class="l" name="2" href="#2">2</a><span class="c">;;</span>
<a class="l" name="3" href="#3">3</a><span class="c">;;   Licensed under the Apache License, Version 2.0 (the &quot;License&quot;);</span>
<a class="l" name="4" href="#4">4</a><span class="c">;;   you may not use this file except in compliance with the License.</span>
<a class="l" name="5" href="#5">5</a><span class="c">;;   You may obtain a copy of the License at</span>
<a class="l" name="6" href="#6">6</a><span class="c">;;</span>
<a class="l" name="7" href="#7">7</a><span class="c">;;       <a href="http://www.apache.org/licenses/LICENSE-2.0">http://www.apache.org/licenses/LICENSE-2.0</a></span>
<a class="l" name="8" href="#8">8</a><span class="c">;;</span>
<a class="l" name="9" href="#9">9</a><span class="c">;;   Unless required by applicable law or agreed to in writing, software</span>
<a class="hl" name="10" href="#10">10</a><span class="c">;;   distributed under the License is distributed on an &quot;AS IS&quot; BASIS,</span>
<a class="l" name="11" href="#11">11</a><span class="c">;;   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.</span>
<a class="l" name="12" href="#12">12</a><span class="c">;;   See the License for the specific language governing permissions and</span>
<a class="l" name="13" href="#13">13</a><span class="c">;;   limitations under the License.</span>
<a class="l" name="14" href="#14">14</a>
<a class="l" name="15" href="#15">15</a>(<a href="/source/s?defs=define%5C-test" class="intelliWindow-symbol" data-definition-place="undefined-in-file">define-test</a> <a class="xf" name="test-mapcar-basics"/><a href="/source/s?refs=test%5C-mapcar%5C-basics" class="xf intelliWindow-symbol" data-definition-place="def">test-mapcar-basics</a>
<a class="l" name="16" href="#16">16</a>    <span class="s">&quot;We can apply a function to each member
<a class="l" name="17" href="#17">17</a>     of a list using mapcar.&quot;</span>
<a class="l" name="18" href="#18">18</a>  (<b>defun</b> <a href="/source/s?defs=times%5C-two" class="intelliWindow-symbol" data-definition-place="undefined-in-file">times-two</a> (<a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a>) (<a href="/source/s?defs=%5C*" class="intelliWindow-symbol" data-definition-place="undefined-in-file">*</a> <a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a> <a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a>))
<a class="l" name="19" href="#19">19</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=____" class="intelliWindow-symbol" data-definition-place="undefined-in-file">____</a> (<a href="/source/s?defs=mapcar" class="intelliWindow-symbol" data-definition-place="undefined-in-file">mapcar</a> #&apos;<a href="/source/s?defs=times%5C-two" class="intelliWindow-symbol" data-definition-place="undefined-in-file">times-two</a> &apos;(<a href="/source/s?defs=1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">1</a> <a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a> <a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a>)))
<a class="hl" name="20" href="#20">20</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=____" class="intelliWindow-symbol" data-definition-place="undefined-in-file">____</a> (<a href="/source/s?defs=mapcar" class="intelliWindow-symbol" data-definition-place="undefined-in-file">mapcar</a> #&apos;<a href="/source/s?defs=first" class="intelliWindow-symbol" data-definition-place="undefined-in-file">first</a> &apos;((<a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a> <a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a> <a href="/source/s?defs=1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">1</a>)
<a class="l" name="21" href="#21">21</a>                                      (<span class="s">&quot;little&quot; &quot;small&quot; &quot;tiny&quot;</span>)
<a class="l" name="22" href="#22">22</a>                                      (<span class="s">&quot;pigs&quot; &quot;hogs&quot; &quot;swine&quot;</span>)))))
<a class="l" name="23" href="#23">23</a>
<a class="l" name="24" href="#24">24</a>
<a class="l" name="25" href="#25">25</a>(<a href="/source/s?defs=define%5C-test" class="intelliWindow-symbol" data-definition-place="undefined-in-file">define-test</a> <a class="xf" name="test-mapcar-multiple-lists"/><a href="/source/s?refs=test%5C-mapcar%5C-multiple%5C-lists" class="xf intelliWindow-symbol" data-definition-place="def">test-mapcar-multiple-lists</a>
<a class="l" name="26" href="#26">26</a>    <span class="s">&quot;The mapcar function can be applied to
<a class="l" name="27" href="#27">27</a>     more than one list. It applies a function
<a class="l" name="28" href="#28">28</a>     to successive elements of the lists.&quot;</span>
<a class="l" name="29" href="#29">29</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=____" class="intelliWindow-symbol" data-definition-place="undefined-in-file">____</a> (<a href="/source/s?defs=mapcar" class="intelliWindow-symbol" data-definition-place="undefined-in-file">mapcar</a> #&apos;<a href="/source/s?defs=%5C*" class="intelliWindow-symbol" data-definition-place="undefined-in-file">*</a> &apos;(<a href="/source/s?defs=1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">1</a> <a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a> <a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a>) &apos;(<a href="/source/s?defs=4" class="intelliWindow-symbol" data-definition-place="undefined-in-file">4</a> <a href="/source/s?defs=5" class="intelliWindow-symbol" data-definition-place="undefined-in-file">5</a> <a href="/source/s?defs=6" class="intelliWindow-symbol" data-definition-place="undefined-in-file">6</a>)))
<a class="hl" name="30" href="#30">30</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=____" class="intelliWindow-symbol" data-definition-place="undefined-in-file">____</a> (<a href="/source/s?defs=mapcar" class="intelliWindow-symbol" data-definition-place="undefined-in-file">mapcar</a> #&apos;<a href="/source/s?defs=list" class="intelliWindow-symbol" data-definition-place="undefined-in-file">list</a> &apos;(<span class="s">&quot;lisp&quot; &quot;are&quot;</span>) &apos;(<span class="s">&quot;koans&quot; &quot;fun&quot;</span>))))
<a class="l" name="31" href="#31">31</a>
<a class="l" name="32" href="#32">32</a>
<a class="l" name="33" href="#33">33</a>(<a href="/source/s?defs=define%5C-test" class="intelliWindow-symbol" data-definition-place="undefined-in-file">define-test</a> <a class="xf" name="test-transpose-using-mapcar"/><a href="/source/s?refs=test%5C-transpose%5C-using%5C-mapcar" class="xf intelliWindow-symbol" data-definition-place="def">test-transpose-using-mapcar</a>
<a class="l" name="34" href="#34">34</a>    <span class="s">&quot;Replace the usage of WRONG-FUNCTION in &apos;transpose&apos; with the
<a class="l" name="35" href="#35">35</a>     correct lisp function (don&apos;t forget the #&apos;).&quot;</span>
<a class="l" name="36" href="#36">36</a>  (<b>defun</b> <a href="/source/s?defs=WRONG%5C-FUNCTION%5C-1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">WRONG-FUNCTION-1</a> (<a href="/source/s?defs=%5C%26rest" class="intelliWindow-symbol" data-definition-place="undefined-in-file">&amp;rest</a> <a href="/source/s?defs=rest" class="intelliWindow-symbol" data-definition-place="undefined-in-file">rest</a>) &apos;())
<a class="l" name="37" href="#37">37</a>  (<b>defun</b> <a href="/source/s?defs=transpose" class="intelliWindow-symbol" data-definition-place="undefined-in-file">transpose</a> (<a href="/source/s?defs=L" class="intelliWindow-symbol" data-definition-place="undefined-in-file">L</a>) (<a href="/source/s?defs=apply" class="intelliWindow-symbol" data-definition-place="undefined-in-file">apply</a> #&apos;<a href="/source/s?defs=mapcar" class="intelliWindow-symbol" data-definition-place="undefined-in-file">mapcar</a> (<a href="/source/s?defs=cons" class="intelliWindow-symbol" data-definition-place="undefined-in-file">cons</a> #&apos;<a href="/source/s?defs=WRONG%5C-FUNCTION%5C-1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">WRONG-FUNCTION-1</a> <a href="/source/s?defs=L" class="intelliWindow-symbol" data-definition-place="undefined-in-file">L</a>)))
<a class="l" name="38" href="#38">38</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> &apos;((<a href="/source/s?defs=1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">1</a> <a href="/source/s?defs=4" class="intelliWindow-symbol" data-definition-place="undefined-in-file">4</a> <a href="/source/s?defs=7" class="intelliWindow-symbol" data-definition-place="undefined-in-file">7</a>)
<a class="l" name="39" href="#39">39</a>                  (<a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a> <a href="/source/s?defs=5" class="intelliWindow-symbol" data-definition-place="undefined-in-file">5</a> <a href="/source/s?defs=8" class="intelliWindow-symbol" data-definition-place="undefined-in-file">8</a>)
<a class="hl" name="40" href="#40">40</a>                  (<a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a> <a href="/source/s?defs=6" class="intelliWindow-symbol" data-definition-place="undefined-in-file">6</a> <a href="/source/s?defs=9" class="intelliWindow-symbol" data-definition-place="undefined-in-file">9</a>))
<a class="l" name="41" href="#41">41</a>                (<a href="/source/s?defs=transpose" class="intelliWindow-symbol" data-definition-place="undefined-in-file">transpose</a> &apos;((<a href="/source/s?defs=1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">1</a> <a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a> <a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a>)
<a class="l" name="42" href="#42">42</a>                             (<a href="/source/s?defs=4" class="intelliWindow-symbol" data-definition-place="undefined-in-file">4</a> <a href="/source/s?defs=5" class="intelliWindow-symbol" data-definition-place="undefined-in-file">5</a> <a href="/source/s?defs=6" class="intelliWindow-symbol" data-definition-place="undefined-in-file">6</a>)
<a class="l" name="43" href="#43">43</a>                             (<a href="/source/s?defs=7" class="intelliWindow-symbol" data-definition-place="undefined-in-file">7</a> <a href="/source/s?defs=8" class="intelliWindow-symbol" data-definition-place="undefined-in-file">8</a> <a href="/source/s?defs=9" class="intelliWindow-symbol" data-definition-place="undefined-in-file">9</a>))))
<a class="l" name="44" href="#44">44</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> &apos;((<span class="s">&quot;these&quot; &quot;pretzels&quot; &quot;are&quot;</span>)
<a class="l" name="45" href="#45">45</a>                  (<span class="s">&quot;making&quot; &quot;me&quot; &quot;thirsty&quot;</span>))
<a class="l" name="46" href="#46">46</a>                (<a href="/source/s?defs=transpose" class="intelliWindow-symbol" data-definition-place="undefined-in-file">transpose</a> &apos;((<span class="s">&quot;these&quot; &quot;making&quot;</span>)
<a class="l" name="47" href="#47">47</a>                             (<span class="s">&quot;pretzels&quot; &quot;me&quot;</span>)
<a class="l" name="48" href="#48">48</a>                             (<span class="s">&quot;are&quot; &quot;thirsty&quot;</span>)))))
<a class="l" name="49" href="#49">49</a>
<a class="hl" name="50" href="#50">50</a>
<a class="l" name="51" href="#51">51</a>(<a href="/source/s?defs=define%5C-test" class="intelliWindow-symbol" data-definition-place="undefined-in-file">define-test</a> <a class="xf" name="test-reduce-basics"/><a href="/source/s?refs=test%5C-reduce%5C-basics" class="xf intelliWindow-symbol" data-definition-place="def">test-reduce-basics</a>
<a class="l" name="52" href="#52">52</a>    <span class="s">&quot;The reduce function combines the elements
<a class="l" name="53" href="#53">53</a>     of a list, from left to right, by applying
<a class="l" name="54" href="#54">54</a>     a binary function to the list elements.&quot;</span>
<a class="l" name="55" href="#55">55</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=___" class="intelliWindow-symbol" data-definition-place="undefined-in-file">___</a>  (<a href="/source/s?defs=reduce" class="intelliWindow-symbol" data-definition-place="undefined-in-file">reduce</a> #&apos;<a href="/source/s?defs=%5C%2B" class="intelliWindow-symbol" data-definition-place="undefined-in-file">+</a> &apos;(<a href="/source/s?defs=1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">1</a> <a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a> <a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a> <a href="/source/s?defs=4" class="intelliWindow-symbol" data-definition-place="undefined-in-file">4</a>)))
<a class="l" name="56" href="#56">56</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=___" class="intelliWindow-symbol" data-definition-place="undefined-in-file">___</a> (<a href="/source/s?defs=reduce" class="intelliWindow-symbol" data-definition-place="undefined-in-file">reduce</a> #&apos;<a href="/source/s?defs=expt" class="intelliWindow-symbol" data-definition-place="undefined-in-file">expt</a> &apos;(<a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a> <a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a> <a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a>))))
<a class="l" name="57" href="#57">57</a>
<a class="l" name="58" href="#58">58</a>
<a class="l" name="59" href="#59">59</a>(<a href="/source/s?defs=define%5C-test" class="intelliWindow-symbol" data-definition-place="undefined-in-file">define-test</a> <a class="xf" name="test-reduce-right-to-left"/><a href="/source/s?refs=test%5C-reduce%5C-right%5C-to%5C-left" class="xf intelliWindow-symbol" data-definition-place="def">test-reduce-right-to-left</a>
<a class="hl" name="60" href="#60">60</a>    <span class="s">&quot;The keyword :from-end allows us to apply
<a class="l" name="61" href="#61">61</a>     reduce from right to left.&quot;</span>
<a class="l" name="62" href="#62">62</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=___" class="intelliWindow-symbol" data-definition-place="undefined-in-file">___</a> (<a href="/source/s?defs=reduce" class="intelliWindow-symbol" data-definition-place="undefined-in-file">reduce</a> #&apos;<a href="/source/s?defs=%5C%2B" class="intelliWindow-symbol" data-definition-place="undefined-in-file">+</a> &apos;(<a href="/source/s?defs=1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">1</a> <a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a> <a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a> <a href="/source/s?defs=4" class="intelliWindow-symbol" data-definition-place="undefined-in-file">4</a>) <a href="/source/s?defs=%5C%3Afrom%5C-end" class="intelliWindow-symbol" data-definition-place="undefined-in-file">:from-end</a> <b>t</b>))
<a class="l" name="63" href="#63">63</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=___" class="intelliWindow-symbol" data-definition-place="undefined-in-file">___</a> (<a href="/source/s?defs=reduce" class="intelliWindow-symbol" data-definition-place="undefined-in-file">reduce</a> #&apos;<a href="/source/s?defs=expt" class="intelliWindow-symbol" data-definition-place="undefined-in-file">expt</a> &apos;(<a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a> <a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a> <a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a>) <a href="/source/s?defs=%5C%3Afrom%5C-end" class="intelliWindow-symbol" data-definition-place="undefined-in-file">:from-end</a> <b>t</b>)))
<a class="l" name="64" href="#64">64</a>
<a class="l" name="65" href="#65">65</a>
<a class="l" name="66" href="#66">66</a>(<a href="/source/s?defs=define%5C-test" class="intelliWindow-symbol" data-definition-place="undefined-in-file">define-test</a> <a class="xf" name="test-reduce-with-initial-value"/><a href="/source/s?refs=test%5C-reduce%5C-with%5C-initial%5C-value" class="xf intelliWindow-symbol" data-definition-place="def">test-reduce-with-initial-value</a>
<a class="l" name="67" href="#67">67</a>    <span class="s">&quot;We can supply an initial value to reduce.&quot;</span>
<a class="l" name="68" href="#68">68</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=___" class="intelliWindow-symbol" data-definition-place="undefined-in-file">___</a> (<a href="/source/s?defs=reduce" class="intelliWindow-symbol" data-definition-place="undefined-in-file">reduce</a> #&apos;<a href="/source/s?defs=expt" class="intelliWindow-symbol" data-definition-place="undefined-in-file">expt</a> &apos;(<a href="/source/s?defs=10" class="intelliWindow-symbol" data-definition-place="undefined-in-file">10</a> <a href="/source/s?defs=21" class="intelliWindow-symbol" data-definition-place="undefined-in-file">21</a> <a href="/source/s?defs=34" class="intelliWindow-symbol" data-definition-place="undefined-in-file">34</a> <a href="/source/s?defs=43" class="intelliWindow-symbol" data-definition-place="undefined-in-file">43</a>) <a href="/source/s?defs=%5C%3Ainitial%5C-value" class="intelliWindow-symbol" data-definition-place="undefined-in-file">:initial-value</a> <a href="/source/s?defs=1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">1</a>))
<a class="l" name="69" href="#69">69</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=___" class="intelliWindow-symbol" data-definition-place="undefined-in-file">___</a> (<a href="/source/s?defs=reduce" class="intelliWindow-symbol" data-definition-place="undefined-in-file">reduce</a> #&apos;<a href="/source/s?defs=expt" class="intelliWindow-symbol" data-definition-place="undefined-in-file">expt</a> &apos;(<a href="/source/s?defs=10" class="intelliWindow-symbol" data-definition-place="undefined-in-file">10</a> <a href="/source/s?defs=21" class="intelliWindow-symbol" data-definition-place="undefined-in-file">21</a> <a href="/source/s?defs=34" class="intelliWindow-symbol" data-definition-place="undefined-in-file">34</a> <a href="/source/s?defs=43" class="intelliWindow-symbol" data-definition-place="undefined-in-file">43</a>) <a href="/source/s?defs=%5C%3Ainitial%5C-value" class="intelliWindow-symbol" data-definition-place="undefined-in-file">:initial-value</a> <a href="/source/s?defs=0" class="intelliWindow-symbol" data-definition-place="undefined-in-file">0</a>)))
<a class="hl" name="70" href="#70">70</a>
<a class="l" name="71" href="#71">71</a>
<a class="l" name="72" href="#72">72</a>(<b>defun</b> <a class="xf" name="WRONG-FUNCTION-2"/><a href="/source/s?refs=WRONG%5C-FUNCTION%5C-2" class="xf intelliWindow-symbol" data-definition-place="def">WRONG-FUNCTION-2</a> (<a href="/source/s?defs=a" class="intelliWindow-symbol" data-definition-place="undefined-in-file">a</a> <a href="/source/s?defs=b" class="intelliWindow-symbol" data-definition-place="undefined-in-file">b</a>) (<a href="/source/s?defs=a" class="intelliWindow-symbol" data-definition-place="undefined-in-file">a</a>))
<a class="l" name="73" href="#73">73</a>(<b>defun</b> <a class="xf" name="WRONG-FUNCTION-3"/><a href="/source/s?refs=WRONG%5C-FUNCTION%5C-3" class="xf intelliWindow-symbol" data-definition-place="def">WRONG-FUNCTION-3</a> (<a href="/source/s?defs=a" class="intelliWindow-symbol" data-definition-place="undefined-in-file">a</a> <a href="/source/s?defs=b" class="intelliWindow-symbol" data-definition-place="undefined-in-file">b</a>) (<a href="/source/s?defs=a" class="intelliWindow-symbol" data-definition-place="undefined-in-file">a</a>))
<a class="l" name="74" href="#74">74</a>
<a class="l" name="75" href="#75">75</a>(<a href="/source/s?defs=define%5C-test" class="intelliWindow-symbol" data-definition-place="undefined-in-file">define-test</a> <a class="xf" name="test-mapcar-and-reduce"/><a href="/source/s?refs=test%5C-mapcar%5C-and%5C-reduce" class="xf intelliWindow-symbol" data-definition-place="def">test-mapcar-and-reduce</a>
<a class="l" name="76" href="#76">76</a>    <span class="s">&quot;mapcar and reduce are a powerful combination.
<a class="l" name="77" href="#77">77</a>     insert the correct function names, instead of WRONG-FUNCTION-X
<a class="l" name="78" href="#78">78</a>     to define an inner product.&quot;</span>
<a class="l" name="79" href="#79">79</a>  (<b>defun</b> <a href="/source/s?defs=inner" class="intelliWindow-symbol" data-definition-place="undefined-in-file">inner</a> (<a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a> <a href="/source/s?defs=y" class="intelliWindow-symbol" data-definition-place="undefined-in-file">y</a>)
<a class="hl" name="80" href="#80">80</a>    (<a href="/source/s?defs=reduce" class="intelliWindow-symbol" data-definition-place="undefined-in-file">reduce</a> #&apos;<a class="d intelliWindow-symbol" href="#WRONG-FUNCTION-2" data-definition-place="defined-in-file">WRONG-FUNCTION-2</a> (<a href="/source/s?defs=mapcar" class="intelliWindow-symbol" data-definition-place="undefined-in-file">mapcar</a> #&apos;<a class="d intelliWindow-symbol" href="#WRONG-FUNCTION-3" data-definition-place="defined-in-file">WRONG-FUNCTION-3</a> <a href="/source/s?defs=x" class="intelliWindow-symbol" data-definition-place="undefined-in-file">x</a> <a href="/source/s?defs=y" class="intelliWindow-symbol" data-definition-place="undefined-in-file">y</a>)))
<a class="l" name="81" href="#81">81</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=32" class="intelliWindow-symbol" data-definition-place="undefined-in-file">32</a> (<a href="/source/s?defs=inner" class="intelliWindow-symbol" data-definition-place="undefined-in-file">inner</a> &apos;(<a href="/source/s?defs=1" class="intelliWindow-symbol" data-definition-place="undefined-in-file">1</a> <a href="/source/s?defs=2" class="intelliWindow-symbol" data-definition-place="undefined-in-file">2</a> <a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a>) &apos;(<a href="/source/s?defs=4" class="intelliWindow-symbol" data-definition-place="undefined-in-file">4</a> <a href="/source/s?defs=5" class="intelliWindow-symbol" data-definition-place="undefined-in-file">5</a> <a href="/source/s?defs=6" class="intelliWindow-symbol" data-definition-place="undefined-in-file">6</a>)))
<a class="l" name="82" href="#82">82</a>  (<a href="/source/s?defs=assert%5C-equal" class="intelliWindow-symbol" data-definition-place="undefined-in-file">assert-equal</a> <a href="/source/s?defs=310" class="intelliWindow-symbol" data-definition-place="undefined-in-file">310</a> (<a href="/source/s?defs=inner" class="intelliWindow-symbol" data-definition-place="undefined-in-file">inner</a> &apos;(<a href="/source/s?defs=10" class="intelliWindow-symbol" data-definition-place="undefined-in-file">10</a> <a href="/source/s?defs=20" class="intelliWindow-symbol" data-definition-place="undefined-in-file">20</a> <a href="/source/s?defs=30" class="intelliWindow-symbol" data-definition-place="undefined-in-file">30</a>) &apos;(<a href="/source/s?defs=4" class="intelliWindow-symbol" data-definition-place="undefined-in-file">4</a> <a href="/source/s?defs=3" class="intelliWindow-symbol" data-definition-place="undefined-in-file">3</a> <a href="/source/s?defs=7" class="intelliWindow-symbol" data-definition-place="undefined-in-file">7</a>))))
<a class="l" name="83" href="#83">83</a></body>
</html>
